sr=44100
kr=4410

    instr 1 ; gives information about your joystick in real time
  kmask     linuxjoystick   0, 1
  kidx      =  2
  kxin      tab       2, 1
  kyin      tab       3, 1
  ktempo    metro     0.1
  kdx       =  kxin/(1<<18)
  kdy       =  kyin/(1<<18)
  kx, ky    xyspace   kdx*ktempo, kdy*ktempo, 1, 2, 1
            printf    "x: %f y: %f dx: %f dy %f\\n", ktempo, kx, ky, kdx, kdy
    endin

